home *** CD-ROM | disk | FTP | other *** search
- ;
- ; Installation script for MUI_MCX_Prefs
- ;
- ; -------------------------------------------------------------
- ; English strings (default)
-
- (if (= @language "deutsch")
- (
- (set #msj1 "Installiere MUI_MCX_Prefs...")
- (set #msj2 "Wo soll MUI_MCX_Prefs installiert werden ?")
- (set #msj3 "Welche Sprachkataloge sollen installiert werden ?")
- (set #msj4 "Installiere 'WBStart.library'...")
- (set #msj5 "Installiere 'WBStart-Handler'...")
- (set #msj6 "Installiere 'DosPath.library'...")
- )
- )
-
- ; German strings
-
- (if (= @language "english")
- (
- (set #msj1 "Installing MUI_MCX_Prefs...")
- (set #msj2 "Where shall I install MUI_MultiCX_Prefs?")
- (set #msj3 "Which languages do You wish to install ?")
- (set #msj4 "Install 'WBStart.library'...")
- (set #msj5 "Install 'WBStart-Handler'...")
- (set #msj6 "Install 'DosPath.library'...")
- )
- )
-
- ; Spanish strings
-
- (if (= @language "español")
- (
- (set #msj1 "Instalando MUI_MCX_Prefs...")
- (set #msj2 "¿Dónde desea instalar MUI_MultiCX_Prefs?")
- (set #msj3 "¿Qué idioma(s) desea instalar?")
- (set #msj4 "Instalando 'WBStart.library'...")
- (set #msj5"Instalando 'WBStart-Handler'...")
- (set #msj6 "Instalando 'DosPath.library'...")
- )
- )
-
- ; Galician strings
-
- (if (= @language "galego")
- (
- (set #msj1 "Instalando MUI_MCX_Prefs...")
- (set #msj2 "¿Onde desexa instalar MUI_MultiCX_Prefs?")
- (set #msj3 "¿Qué língua(s) desexa instalar?")
- (set #msj4 "Instalando 'WBStart.library'...")
- (set #msj5 "Instalando 'WBStart-Handler'...")
- (set #msj6 "Instalando 'DosPath.library'...")
- )
- )
-
- ; French strings
-
- (if (= @language "français")
- (
- (set #msj1 "Je suis en train de copier MUI_MCX_Prefs...")
- (set #msj2 "Oú voulez-vous copier MUI_MultiCX_Prefs?")
- (set #msj3 "Quelles sont les langues à installer?")
- (set #msj4 "Je suis en train de copier 'WBStart.library'...")
- (set #msj5 "Je suis en train de copier 'WBStart-Handler'...")
- (set #msj6 "Je suis en train de copier 'DosPath.library'...")
- )
- )
-
- ; Start
-
- (transcript #msj1)
-
- (set name
- (askdir
- (prompt #msj2)
- (help @askdir-help)
- (default "SYS:Prefs")
- )
- )
-
- (copyfiles
- (source "MUI_MCX_Prefs")
- (infos)
- (dest name)
- )
-
- (set lang
- (askoptions
- (prompt #msj3)
- (help @askoptions-help)
- (choices "deutsch")
- (default def-lang)
- )
- )
-
- (set n 0)
-
- (while (set language (select n "deutsch" "" ) )
- (
- (if (IN lang n)
- (copyfiles
- (source (cat "locale/" language ".catalog" ))
- (dest (cat "LOCALE:catalogs/" language ))
- (newname "mcxp.catalog")
- )
- )
- (set n (+ n 1))
- ))
-
- (set vernum (getversion "intuition.library" (resident)))
- (set ver (/ vernum 65536))
-
-
- (if ( > ver 38)
-
- (copylib
- (prompt #msj4)
- (help @copylib-help)
- (source "libs/wbstart.library")
- (dest "libs:")
- (confirm)
- )
-
- (copylib
- (prompt #msj5)
- (help @copylib-help)
- (source "l/WBStart-Handler")
- (dest "l:")
- (confirm)
- )
-
- )
-
- (if ( > ver 38)
-
- (copylib
- (prompt #msj6)
- (help @copylib-help)
- (source "libs/dospath.library")
- (dest "libs:")
- (confirm)
- )
-
-
- )
-
- (set @default-dest name)
-
- (exit)
-